home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 22 / CU Amiga Magazine's Super CD-ROM 22 (1998)(EMAP Images)(GB)[!][issue 1998-05].iso / PowerPC / Graphics / SViewNG / SuperViewLibrary / Install_SVLib < prev    next >
Encoding:
Text File  |  1998-03-06  |  20.8 KB  |  613 lines
  1. ; $VER: Install_SVLib V19.11 (30.12.97)
  2. ; © 1993-97 by Andreas R. Kleinert.
  3. ; This is the Installer Script for superview.library V19+
  4. ; Italian strings by Alessandro Basso (cralex@amiga.dei.unipd.it)
  5. ; Norwegian strings by Roger Hågensen (msi@sn.no)
  6. ; French strings by Julien Wilk (wilkj@esiee.fr)
  7.  
  8.  
  9. (set @app-name "SuperView-Library")
  10. (welcome "SuperView-Library Installation")
  11.  
  12. (message (cat "If you are running MCP and don't disable the\n"
  13.               "following patches, you may encounter big problems:\n\n"
  14.               "- new tooltypes\n"
  15.               "- reqtols patch\n"
  16.               "- onereq\n"
  17.               "- library search\n"
  18.               "- SetRGB32\n"
  19.               "\nYou may wish to ask the authors of MCP to fix this\n"
  20.               "- if not already done. So, be warned !"))
  21.  
  22. (set #cpu (database "cpu")) (if (> (exists ("sys:libs/68060.library")) 0)   (set #cpu     "68060")  )
  23. (set #ppc_cpu "none")       (if (> (exists ("sys:libs/ppc.library")) 0)     (set #ppc_cpu "PPC60x") )
  24.                             (if (> (exists ("sys:libs/PowerPC.library")) 0) (set #ppc_cpu "PPC60x") )
  25.  
  26. (if (= #ppc_cpu "PPC60x")
  27.  (
  28.   (message (cat "\nWhen using SuperView-Libraries' PPC-Modules, make\n"
  29.                 "sure, that you don't have powerpc.library V12+\n"
  30.                 "installed together with ppc.library.\n\n"
  31.                 "Powerpc.library V7 will work, though.")
  32.   )
  33.  )
  34. )
  35.  
  36. ; *** english is default language
  37.  
  38.     (set #Msg_Yes "Yes")
  39.     (set #Msg_No  "No")
  40.     (set #Msg_BasicConfig "What's your basic configuration ?")
  41.     (set #Gfx0  "Not specified (do not change)")
  42.     (set #Gfx1  "Amiga OCS/ECS, no GfxCard")
  43.     (set #Gfx2  "Amiga AGA, no GfxCard")
  44.     (set #Gfx3  "CD-32 AGA, no GfxCard")
  45.     (set #Gfx4  "Card with CyberGraphX emulation")
  46.     (set #Gfx5  "Card with Picasso96 emulation")
  47.     (set #Gfx6  "Card with EGS emulation")
  48.     (set #Gfx7  "Picasso II(+)/IV")
  49.     (set #Gfx8  "Retina Z2/BLT Z3")
  50.     (set #Gfx9  "Merlin II")
  51.     (set #Gfx10 "OpalVision")
  52.     (set #Gfx11 "Amiga OCS/ECS/AGA, other GfxCard")
  53.     (set #Msg_CopyEnvConfig "Copying appropriate configuration to ENV:")
  54.     (set #Msg_LibPath "Library Path")
  55.     (set #Msg_InstallingLibs "Copying Libraries...")
  56.     (set #Msg_Ghostscript (cat "\nDo you already have Ghostscript installed ?\n\n"
  57.                                "(When answering with <Yes>, you have to supply\n"
  58.                                " the program's path and name here.)\n"
  59.                          )
  60.     )
  61.     (set #Msg_GSPath "Path and name of Ghostscript executable")
  62.     (set #Msg_MetaView    (cat "\nDo you already have MetaView installed ?\n\n"
  63.                                "(When answering with <Yes>, you have to supply\n"
  64.                                " the program's path and name here.)\n"
  65.                          )
  66.     )
  67.     (set #Msg_MVPath "Path and name of MetaView executable")
  68.     (set #Msg_CatPath "Catalog Path")
  69.     (set #Msg_InstallingCats "Copying catalog files...")
  70.     (set #Msg_VMEM "Now modifying your S:User-Startup for VMem-Support...")
  71.     (set #Msg_VMemPath "Virtual Memory Path")
  72.     (set #Msg_CopyPrefs "Copy SVPrefs to SYS:Prefs ?")
  73.     (set #Msg_PackerSupport "Install PackerSupport right now ?")
  74.     (set #Msg_SQOperators "Install SQ-Operators right now ?")
  75.     (set #Msg_Ready "SuperView-Library has been installed now.\nIf this was an Update, you should\nreboot your computer now.")
  76.  
  77.  
  78. (if (= @language "deutsch")
  79.   (
  80.     (set #Msg_Yes "Ja")
  81.     (set #Msg_No  "Nein")
  82.     (set #Msg_BasicConfig "Was ist Ihre Grundkonfiguration ?")
  83.     (set #Gfx0  "Keine Angabe (nichts ändern)")
  84.     (set #Gfx1  "Amiga OCS/ECS, keine Grafikkarte")
  85.     (set #Gfx2  "Amiga AGA, keine Grafikkarte")
  86.     (set #Gfx3  "CD-32 AGA, keine Grafikkarte")
  87.     (set #Gfx4  "Karte mit CyberGraphX-Emulation")
  88.     (set #Gfx5  "Karte mit Picasso96-Emulation")
  89.     (set #Gfx6  "Karte mit EGS-Emulation")
  90.     (set #Gfx7  "Picasso II(+)/IV")
  91.     (set #Gfx8  "Retina Z2/BLT Z3")
  92.     (set #Gfx9  "Merlin II")
  93.     (set #Gfx10 "OpalVision")
  94.     (set #Gfx11 "Amiga OCS/ECS/AGA, andere Grafikkarte")
  95.     (set #Msg_CopyEnvConfig "Kopiere notwendige Konfiguration nach ENV:")
  96.     (set #Msg_LibPath "Library-Pfad")
  97.     (set #Msg_InstallingLibs "Kopiere Libraries...")
  98.     (set #Msg_Ghostscript (cat "\nHaben Sie bereits Ghostscript installiert ?\n\n"
  99.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  100.                                " Programmpfad und -namen angeben.)\n"
  101.                          )
  102.     )
  103.     (set #Msg_GSPath "Pfad und Name des Ghostscript-Programmes")
  104.     (set #Msg_MetaView    (cat "\nHaben Sie bereits MetaView installiert ?\n\n"
  105.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  106.                                " Programmpfad und -namen angeben.)\n"
  107.                          )
  108.     )
  109.     (set #Msg_MVPath "Pfad und Name des MetaView-Programmes")
  110.     (set #Msg_CatPath "Katalogpfad")
  111.     (set #Msg_InstallingCats "Kopiere Katalogdateien...")
  112.     (set #Msg_VMEM "Ändere jetzt S:User-Startup für VMem-Unterstützung...")
  113.     (set #Msg_VMemPath "Pfad für virtuellen Speicher")
  114.     (set #Msg_CopyPrefs "SVPrefs nach SYS:Prefs kopieren ?")
  115.     (set #Msg_PackerSupport "Packer-Unterstützung jetzt gleich installieren ?")
  116.     (set #Msg_SQOperators "SQ-Operators jetzt gleich installieren ?")
  117.     (set #Msg_Ready "SuperView-Library wurde installiert.\nFalls dies ein Update war, sollten Sie ggf.\nIhren Rechner nun neu starten.")
  118.   )
  119. )
  120.  
  121. (if (= @language "italiano")
  122.   (
  123.     (set #Msg_Yes "Si")
  124.     (set #Msg_No  "No")
  125.     (set #Msg_BasicConfig "Qual è la tua configurazione base ?")
  126.     (set #Gfx0  "Non specificata (da non cambiare)")
  127.     (set #Gfx1  "Amiga OCS/ECS, senza SchedaGfx")
  128.     (set #Gfx2  "Amiga AGA, senza SchedaGfx")
  129.     (set #Gfx3  "CD-32 AGA, senza SchedaGfx")
  130.     (set #Gfx4  "Scheda con Emulazione-CyberGraphX")
  131.     (set #Gfx5  "Scheda con Emulazione-Picasso96")
  132.     (set #Gfx6  "Scheda con Emulazione-EGS")
  133.     (set #Gfx7  "Picasso II(+)/IV")
  134.     (set #Gfx8  "Retina Z2/BLT Z3")
  135.     (set #Gfx9  "Merlin II")
  136.     (set #Gfx10 "OpalVision")
  137.     (set #Gfx11 "Amiga OCS/ECS/AGA, altra SchedaGfx")
  138.     (set #Msg_CopyEnvConfig "Sto copiando configurazione appropriata in ENV:")
  139.     (set #Msg_LibPath "Percorso Libreria")
  140.     (set #Msg_InstallingLibs "Sto copiando Librerie...")
  141.     (set #Msg_Ghostscript (cat "\nHai già installato il Ghostscript ?\n\n"
  142.                                "(Se rispondi con <Si>, dovrai fornire\n"
  143.                                "nome e percorso del programma qui.)\n"
  144.                          )
  145.     )
  146.     (set #Msg_GSPath "Percorso e nome dell'eseguibile Ghostscript")
  147.     (set #Msg_MetaView    (cat "\nHai già installato il MetaView ?\n\n"
  148.                                "(Se rispondi con <Si>, dovrai fornire\n"
  149.                                "nome e percorso del programma qui.)\n"
  150.                          )
  151.     )
  152.     (set #Msg_MVPath "Percorso e nome dell'eseguibile MetaView")
  153.     (set #Msg_CatPath "Percorso Catalogo")
  154.     (set #Msg_InstallingCats "Sto copiando files del catalogo...")
  155.     (set #Msg_VMEM "Ora modifico la tua S:User-Startup per supporto-VMem...")
  156.     (set #Msg_VMemPath "Percorso Memoria Virtuale")
  157.     (set #Msg_CopyPrefs "Copio SVPrefs in SYS:Prefs ?")
  158.     (set #Msg_PackerSupport "Installo Supporto-Packer adesso ?")
  159.     (set #Msg_SQOperators "Installo Operatori-SQ adesso ?")
  160.     (set #Msg_Ready "Libreria-SuperView è stata ora installata.\nSe questo fosse un Aggiornamento, dovresti\neseguire un reboot del tuo computer ora.")
  161.   )
  162. )
  163.  
  164. (if (= @language "norsk")
  165.   (
  166.     (set #Msg_Yes "Ja")
  167.     (set #Msg_No  "Nei")
  168.     (set #Msg_BasicConfig "Hva er din standard konfigurasjon ?")
  169.     (set #Gfx0  "Ikke spesifisert (ikke forandre)")
  170.     (set #Gfx1  "Amiga OCS/ECS, ingen GfxKort")
  171.     (set #Gfx2  "Amiga AGA, ingen GfxKort")
  172.     (set #Gfx3  "CD-32 AGA, ingen GfxKort")
  173.     (set #Gfx4  "Kort med CyberGraphX emulasjon")
  174.     (set #Gfx5  "Kort med Picasso96 emulasjon")
  175.     (set #Gfx6  "Kort med EGS emulasjon")
  176.     (set #Gfx7  "Picasso II(+)/IV")
  177.     (set #Gfx8  "Retina Z2/BLT Z3")
  178.     (set #Gfx9  "Merlin II")
  179.     (set #Gfx10 "OpalVision")
  180.     (set #Gfx11 "Amiga OCS/ECS/AGA, annet GfxKort")
  181.     (set #Msg_CopyEnvConfig "Kopierer passende konfigurasjon til ENV:")
  182.     (set #Msg_LibPath "Bibliotek Sti (Library)")
  183.     (set #Msg_InstallingLibs "Kopierer Bibliotek...")
  184.     (set #Msg_Ghostscript (cat "\nHar du allerede Ghostscript installert ?\n\n"
  185.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  186.                                " programmet og programmets navn her.)\n"
  187.                          )
  188.     )
  189.     (set #Msg_GSPath "Sti og navn til Ghostscript program")
  190.     (set #Msg_MetaView    (cat "\nHar du allerede MetaView installert ?\n\n"
  191.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  192.                                " programmet og programmets navn her.)\n"
  193.                          )
  194.     )
  195.     (set #Msg_MVPath "Stio og nanv til MetaView program")
  196.     (set #Msg_CatPath "Katalog Sti")
  197.     (set #Msg_InstallingCats "Kopierer katalog filer...")
  198.     (set #Msg_VMEM "Modifiserer nå S:User-Startup for VMem-Støtte...")
  199.     (set #Msg_VMemPath "Virtuellt Minne Sti")
  200.     (set #Msg_CopyPrefs "Kopier SVPrefs til SYS:Prefs ?")
  201.     (set #Msg_PackerSupport "Installer PackerStøtte nå?")
  202.     (set #Msg_SQOperators "Installer SQ-Operatører (Operators) nå ?")
  203.     (set #Msg_Ready "SuperView-Library er nå installert.\nHvis dette var en Oppdatering, bør du\nstarte maskinen på nytt.")
  204.   )
  205. )
  206.  
  207. (if (= @language "français")
  208.   (
  209.     (set #Msg_Yes "Oui")
  210.     (set #Msg_No  "Non")
  211.     (set #Msg_BasicConfig "Quelle est votre configuration de base ?")
  212.     (set #Gfx0  "Non listée (ne rien changer)")
  213.     (set #Gfx1  "Amiga OCS/ECS, pas de carte graphique")
  214.     (set #Gfx2  "Amiga AGA, pas de carte graphique")
  215.     (set #Gfx3  "CD-32 AGA, pas de carte graphique")
  216.     (set #Gfx4  "Carte avec émulation CyberGraphX")
  217.     (set #Gfx5  "Carte avec émulation Picasso96")
  218.     (set #Gfx6  "Carte avec émulation EGS")
  219.     (set #Gfx7  "Picasso II(+)/IV")
  220.     (set #Gfx8  "Retina Z2/BLT Z3")
  221.     (set #Gfx9  "Merlin II")
  222.     (set #Gfx10 "OpalVision")
  223.     (set #Gfx11 "Amiga OCS/ECS/AGA, autre carte graphique")
  224.     (set #Msg_CopyEnvConfig "Copie de la configuration appropriée dans ENV:")
  225.     (set #Msg_LibPath "Chemin des librairies")
  226.     (set #Msg_InstallingLibs "Copie des librairies...")
  227.     (set #Msg_Ghostscript (cat "\nAvez-vous déjà installé Ghostscript ?\n\n"
  228.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  229.                                " le chemin du programme et son nom.)\n"
  230.                          )
  231.     )
  232.     (set #Msg_GSPath "Chemin et nom de l'exécutable Ghostscript")
  233.     (set #Msg_MetaView    (cat "\nAvez-vous déjà installé MetaView ?\n\n"
  234.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  235.                                " le chemin du programme et son nom.)\n"
  236.                          )
  237.     )
  238.     (set #Msg_MVPath "Chemin et nom de l'exécutable MetaView")
  239.     (set #Msg_CatPath "Chemin des catalogues")
  240.     (set #Msg_InstallingCats "Copie des fichiers catalogues...")
  241.     (set #Msg_VMEM "Modification de votre S:User-Startup au niveau de VMem-Support...")
  242.     (set #Msg_VMemPath "Chemin de la mémoire virtuelle")
  243.     (set #Msg_CopyPrefs "Copier SVPrefs dans SYS:Prefs ?")
  244.     (set #Msg_PackerSupport "Installer le PackerSupport maintenant ?")
  245.     (set #Msg_SQOperators "Installer les SQ-Operators maintenant ?")
  246.     (set #Msg_Ready "SuperView-Library a été installé avec succès.\nS'il s'agissait d'une mise à jour, vous devriez\nredémarrer votre ordinateur maintenant.")
  247.   )
  248. )
  249.  
  250. ; **************************************************************************
  251. ; Create/Update basic configuration
  252.  
  253. (makedir "ENV:SuperView-Library")
  254. (makedir "ENVARC:SuperView-Library")
  255.  
  256. (set #selectsvdriver (askchoice
  257.                       (prompt #Msg_BasicConfig)
  258.                       (help @askchoice-help)
  259.                       (choices #Gfx0 #Gfx1 #Gfx2 #Gfx3 #Gfx4 #Gfx5 #Gfx6 #Gfx7 #Gfx8 #Gfx9 #Gfx10 #Gfx11)
  260.                       (default 1)
  261.                     )
  262. )
  263.  
  264. (if (= #selectsvdriver 1)  (set #env_source "docs/SampleConfigs/env_ECS")           )
  265. (if (= #selectsvdriver 2)  (set #env_source "docs/SampleConfigs/env_AGA")           )
  266. (if (= #selectsvdriver 3)  (set #env_source "docs/SampleConfigs/env_AGA_CD32")      )
  267. (if (= #selectsvdriver 4)  (set #env_source "docs/SampleConfigs/env_CyberGraphics") )
  268. (if (= #selectsvdriver 5)  (set #env_source "docs/SampleConfigs/env_Picasso96")     )
  269. (if (= #selectsvdriver 6)  (set #env_source "docs/SampleConfigs/env_EGS7")          )
  270. (if (= #selectsvdriver 7)  (set #env_source "docs/SampleConfigs/env_PicassoII")     )
  271. (if (= #selectsvdriver 8)  (set #env_source "docs/SampleConfigs/env_Retina")        )
  272. (if (= #selectsvdriver 9)  (set #env_source "docs/SampleConfigs/env_Merlin")        )
  273. (if (= #selectsvdriver 10) (set #env_source "docs/SampleConfigs/env_OpalVision")    )
  274. (if (= #selectsvdriver 11) (set #env_source "docs/SampleConfigs/env_GfxCards")      )
  275.  
  276. (if (> #selectsvdriver 0)
  277.   (
  278.     (copyfiles
  279.       (prompt #Msg_CopyEnvConfig)
  280.       (help @copyfiles-help)
  281.       (source #env_source)
  282.       (dest "ENV:")
  283.       (all)
  284.     )
  285.     (copyfiles
  286.       (prompt #Msg_CopyEnvConfig)
  287.       (help @copyfiles-help)
  288.       (source #env_source)
  289.       (dest "ENVARC:")
  290.       (all)
  291.     )
  292.   )
  293. )
  294.  
  295. (copyfiles
  296.   (prompt #Msg_CopyEnvConfig)
  297.   (help @copyfiles-help)
  298.   (source "env")
  299.   (dest "ENVARC:")
  300.   (all)
  301. )
  302.  
  303. ; **************************************************************************
  304. ; Install main libraries
  305.  
  306. (if (exists "ENVARC:SuperView-Library/SVLIB_WHERE") (set #svlibdir (getenv "SuperView-Library/SVLIB_WHERE"))
  307.  
  308.  (set #svlibdir "LIBS:")
  309. )
  310.  
  311. (if (= (exists (#svlibdir)) 0) (set #svlibdir "LIBS:") )
  312.  
  313. (set #svlibdir
  314.               (askdir
  315.                       (prompt #Msg_LibPath)
  316.                       (help @askdir-help)
  317.                       (newpath)
  318.                       (default #svlibdir)
  319.                )
  320. )
  321.  
  322. (delete "ENVARC:SuperView-Library/SVLIB_WHERE")
  323. (delete "ENV:SuperView-Library/SVLIB_WHERE")
  324. (textfile (dest "ENVARC:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  325. (textfile (dest "ENV:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  326.  
  327. (copylib
  328.   (prompt #Msg_InstallingLibs)
  329.   (help @copylib-help)
  330.   (source "libs/superview.library")
  331.   (dest #svlibdir)
  332. )
  333.  
  334. (set @default-dest #svlibdir)
  335.  
  336. (copylib
  337.   (prompt #Msg_InstallingLibs)
  338.   (help @copylib-help)
  339.   (source "libs/superviewsupport.library")
  340.   (dest #svlibdir)
  341. )
  342.  
  343. ; **************************************************************************
  344. ; Ask for Ghostscript
  345.  
  346. (set #gsquest (askchoice
  347.                 (prompt #Msg_Ghostscript)
  348.                 (help @askchoice-help)
  349.                 (choices #Msg_Yes #Msg_No)
  350.                 (default 1)
  351.               )
  352. )
  353.  
  354. (if (= #gsquest 0)
  355.   (
  356.     (set #gspath (askfile
  357.                   (prompt #Msg_GSPath)
  358.                   (help @askfile-help)
  359.                   (default "gs000")
  360.                 )
  361.     )
  362.     (set #gspathopt (cat "GS_PATH=" #gspath "\n"))
  363.     (textfile
  364.       (dest "ENV:SuperView-Library/Ghostscript.controlpad")
  365.       (append #gspathopt)
  366.     )
  367.     (copyfiles
  368.       (source "ENV:SuperView-Library/Ghostscript.controlpad")
  369.       (dest "ENVARC:SuperView-Library")
  370.     )
  371.   )
  372. )
  373.  
  374. ; **************************************************************************
  375. ; Ask for MetaView
  376.  
  377. (set #mvquest (askchoice
  378.                 (prompt #Msg_MetaView)
  379.                 (help @askchoice-help)
  380.                 (choices #Msg_Yes #Msg_No)
  381.                 (default 1)
  382.               )
  383. )
  384.  
  385. (if (= #mvquest 0)
  386.   (
  387.     (set #mvpath (askfile
  388.                   (prompt #Msg_MVPath)
  389.                   (help @askfile-help)
  390.                   (default "MetaView")
  391.                 )
  392.     )
  393.     (set #mvpathopt (cat "METAVIEW_PATH=" #mvpath "\n"))
  394.     (textfile
  395.       (dest "ENV:SuperView-Library/MetaView.controlpad")
  396.       (append #mvpathopt)
  397.     )
  398.     (copyfiles
  399.       (source "ENV:SuperView-Library/MetaView.controlpad")
  400.       (dest "ENVARC:SuperView-Library")
  401.     )
  402.   )
  403. )
  404.  
  405. ; **************************************************************************
  406. ; Install catalogs
  407.  
  408. (makedir "SYS:locale")
  409. (makedir "SYS:locale/catalogs")
  410.  
  411. (copyfiles
  412.   (prompt #Msg_InstallingCats)
  413.   (help @copyfiles-help)
  414.   (source "locale/catalogs")
  415.   (set #svcatdir
  416.               (askdir
  417.                      (prompt #Msg_CatPath)
  418.                      (help @askdir-help)
  419.                      (newpath)
  420.                      (default "SYS:locale/Catalogs")
  421.               )
  422.   )
  423.   (dest #svcatdir)
  424.   (all)
  425. )
  426.  
  427. ; **************************************************************************
  428. ; Install library modules
  429.  
  430. (set #svobjectdir   (tackon #svlibdir "svobjects"))
  431. (set #svdriverdir   (tackon #svlibdir "svdrivers"))
  432. (set #svoperatordir (tackon #svlibdir "svoperators"))
  433. (set #svstoredir    (tackon #svlibdir "svstorage"))
  434.  
  435. (makedir #svobjectdir)
  436. (makedir #svdriverdir)
  437. (makedir #svoperatordir)
  438. (makedir #svstoredir)
  439.  
  440. (copyfiles
  441.   (prompt #Msg_InstallingLibs)
  442.   (help @copyfiles-help)
  443.   (source "libs/svobjects")
  444.   (dest (tackon #svlibdir "svobjects"))
  445.   (pattern "#?")
  446.   (confirm)
  447.   (files)
  448. )
  449.  
  450. (if (exists(tackon #svobjectdir "SVO.svobject"))
  451.  (rename (tackon #svobjectdir "SVO.svobject") (tackon #svstoredir "SVO.svobject") (safe))
  452. )
  453.  
  454. (if (exists(tackon #svobjectdir "CyberDataType.svobject"))
  455.  (rename (tackon #svobjectdir "CyberDataType.svobject") (tackon #svstoredir "CyberDataType.svobject") (safe))
  456. )
  457.  
  458. (copyfiles
  459.   (prompt #Msg_InstallingLibs)
  460.   (help @copyfiles-help)
  461.   (source "libs/svdrivers")
  462.   (dest (tackon #svlibdir "svdrivers"))
  463.   (pattern "#?")
  464.   (confirm)
  465.   (files)
  466. )
  467.  
  468. (if (NOT (= #selectsvdriver 5))
  469.  (rename (tackon #svdriverdir "Picasso96.svdriver") (tackon #svstoredir "Picasso96.svdriver") (safe))
  470. )
  471.  
  472. (if (NOT (= #selectsvdriver 6))
  473.  (rename (tackon #svdriverdir "EGS7.svdriver") (tackon #svstoredir "EGS7.svdriver") (safe))
  474. )
  475.  
  476. (if (NOT (= #selectsvdriver 7))
  477.  (rename (tackon #svdriverdir "PicassoII.svdriver") (tackon #svstoredir "PicassoII.svdriver") (safe))
  478. )
  479.  
  480. (if (NOT (= #selectsvdriver 8))
  481.  (rename (tackon #svdriverdir "Retina.svdriver") (tackon #svstoredir "Retina.svdriver") (safe))
  482. )
  483.  
  484. (if (NOT (= #selectsvdriver 9))
  485.  (rename (tackon #svdriverdir "MERLIN.svdriver") (tackon #svstoredir "MERLIN.svdriver") (safe))
  486. )
  487.  
  488. (if (NOT (= #selectsvdriver 10))
  489.  (rename (tackon #svdriverdir "OPAL.svdriver") (tackon #svstoredir "OPAL.svdriver") (safe))
  490. )
  491.  
  492. (copyfiles
  493.   (prompt #Msg_InstallingLibs)
  494.   (help @copyfiles-help)
  495.   (source "libs/svoperators")
  496.   (dest (tackon #svlibdir "svoperators"))
  497.   (pattern "#?")
  498.   (confirm)
  499.   (files)
  500. )
  501.  
  502. (if (>= #cpu 68020)
  503.   (
  504.     (copyfiles
  505.       (prompt #Msg_InstallingLibs)
  506.       (help @copyfiles-help)
  507.       (source "libs/68030")
  508.       (dest #svlibdir)
  509.       (confirm)
  510.       (all)
  511.     )
  512.   )
  513. )
  514.  
  515. ; **************************************************************************
  516. ; Modify User-Startup
  517.  
  518. (if (exists "ENVARC:SuperView-Library/SVMEM_WHERE") (set #vmemdir (getenv "SuperView-Library/SVMEM_WHERE"))
  519.  
  520.  (set #vmemdir "T:")
  521. )
  522.  
  523. (if (= (exists (#vmemdir)) 0) (set #vmemdir "T:") )
  524.  
  525. (set #vmemdir
  526.               (askdir
  527.                 (prompt #Msg_VMemPath)
  528.                 (help @askdir-help)
  529.                 (newpath)
  530.                 (default #vmemdir)
  531.               )
  532. )
  533.  
  534. (delete "ENVARC:SuperView-Library/SVMEM_WHERE")
  535. (delete "ENV:SuperView-Library/SVMEM_WHERE")
  536. (textfile (dest "ENVARC:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  537. (textfile (dest "ENV:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  538.  
  539. (startup "SuperView-Library"
  540.   (prompt #Msg_VMEM)
  541.   (help @startup-help)
  542.   (command "Assign VMEM: "#vmemdir"\nSYS:Prefs/SVPrefs >NIL: <NIL: INIT\n")
  543. )
  544.  
  545. ; **************************************************************************
  546. ; Install SVPrefs
  547.  
  548. (copyfiles
  549.   (prompt #Msg_CopyPrefs)
  550.   (help @copyfiles-help)
  551.   (source "Prefs")
  552.   (dest "SYS:Prefs")
  553.   (all)
  554.   (confirm)
  555. )
  556.  
  557. ; **************************************************************************
  558. ; Ask for Packersupport
  559.  
  560. (if (exists "PackerSupport")
  561.   (
  562.     (set #ask_ps (askbool (prompt #Msg_PackerSupport) (help @askbool-help) ) )
  563.  
  564.     (if (= #ask_ps TRUE)
  565.       (
  566.         (copyfiles
  567.           (prompt #Msg_InstallingLibs)
  568.           (help @copyfiles-help)
  569.           (source "PackerSupport/libs/svobjects")
  570.           (dest (tackon #svlibdir "svobjects"))
  571.           (pattern "#?")
  572.           (files)
  573.         )
  574.       )
  575.     )
  576.   )
  577. )
  578.  
  579. ; **************************************************************************
  580. ; Ask for SQOperators
  581.  
  582. (if (exists "SQ-Operators")
  583.   (
  584.     (set #ask_sq (askbool (prompt #Msg_SQOperators) (help @askbool-help) ) )
  585.  
  586.     (if (= #ask_sq TRUE)
  587.       (
  588.         (copyfiles
  589.           (prompt #Msg_CopyEnvConfig)
  590.           (help @copyfiles-help)
  591.           (source "SQ-Operators/envarc")
  592.           (dest "ENVARC:")
  593.           (all)
  594.         )
  595.         (copyfiles
  596.           (prompt #Msg_InstallingLibs)
  597.           (help @copyfiles-help)
  598.           (source "SQ-Operators/libs/svoperators")
  599.           (dest (tackon #svlibdir "svoperators"))
  600.           (pattern "#?")
  601.           (confirm)
  602.           (files)
  603.         )
  604.       )
  605.     )
  606.   )
  607. )
  608.  
  609. ; **************************************************************************
  610. ; EOF ;-)
  611.  
  612. (exit #Msg_Ready)
  613.